(* Symbols *)

( ) >= <= <> = > < + - * / : ; := .. . , [ ] # ^ &

(* Keywords *)

AND       ELSE      IMPORT    PROCEDURE
ARRAY     ELSIF     IN        RETURN
BEGIN     END       MOD       THEN
BY        EXIT      MODULE    TO
CONST     FOR       NOT       VAR
DIV       FROM      OF        WHILE
DO        IF        OR

(* Pervasive Identifiers *)

ABS       EXCL      LONGINT   REAL
BITSET    FALSE     LONGREAL  SIZE
BOOLEAN   MAX       TRUE	  VAL
CAP       HALT      MIN       
HIGH      NIL       TRUNC
CHAR      INC       ODD
CHR       INCL      ORD
DEC       INTEGER   PROC

(* String *)

"sdjnsdpbifd"

(* Integer *)

1234657890

(* Real *)

1.23456789

(* Identifier *)

AND        ELSE       IMPORT     PROCEDURE
ARRAY      ELSIF      IN         RETURN
BEGIN      END        ºMOD        THEN
BY         EXIT       MODULE     TO
CONST      FOR        NOT        VAR
DIV        FROM       OF         WHILE
DO         IF         OR

ABS       EXCL      LONGINT   REAL
BITSET    FALSE     LONGREAL  SIZE
BOOLEAN   MAX       TRUE	  VAL
CAP       HALT      MIN       
HIGH      NIL       TRUNC
CHAR      INC       ODD
CHR       INCL      ORD
DEC       INTEGER   PROC